home *** CD-ROM | disk | FTP | other *** search
/ EuroCD 3 / EuroCD 3.iso / Programming / SecalDemo / Inc / devices / keymap.inc < prev    next >
Text File  |  1998-06-24  |  837b  |  53 lines
  1. include "inc/exec/nodes.inc";
  2. include "inc/exec/lists.inc";
  3.  
  4. struct KeyMap is
  5.   km_LoKeyMapTypes:ulong;
  6.   km_LoKeyMap:ulong;
  7.   km_LoCapsable:ulong;
  8.   km_LoRepeatable:ulong;
  9.   km_HiKeyMapTypes:ulong;
  10.   km_HiKeyMap:ulong;
  11.   km_HiCapsable:ulong;
  12.   km_HiRepeatable:ulong;
  13. ;
  14.  
  15. struct KeyMapNode is
  16.   kn_Node:Node;
  17.   kn_KeyMap:KeyMap;
  18. ;
  19.  
  20. struct KeyMapResource is
  21.   kr_Node:Node;
  22.   kr_List:List;
  23. ;
  24.  
  25. def KC_NOQUAL = 0;
  26. def KC_VANILLA = 7;
  27. def KCB_SHIFT = 0;
  28. def KCF_SHIFT = $01;
  29. def KCB_ALT = 1;
  30. def KCF_ALT = $02;
  31. def KCB_CONTROL = 2;
  32. def KCF_CONTROL = $04;
  33. def KCB_DOWNUP = 3;
  34. def KCF_DOWNUP = $08;
  35.  
  36. def KCB_DEAD = 5;
  37. def KCF_DEAD = $20;
  38.  
  39. def KCB_STRING = 6;
  40. def KCF_STRING = $40;
  41.  
  42. def KCB_NOP = 7;
  43. def KCF_NOP = $80;
  44.  
  45. def DPB_MOD = 0;
  46. def DPF_MOD = $01;
  47. def DPB_DEAD = 3;
  48. def DPF_DEAD = $08;
  49.  
  50. def DP_2DINDEXMASK = $0f;
  51. def DP_2DFACSHIFT = 4;
  52.  
  53.